home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / Graphics / Sphere / Source / SphereView.m < prev    next >
Text File  |  1991-07-13  |  503b  |  29 lines
  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "SphereView.h"
  5. #import "SphereControl.h"
  6. #import "SphereDrawerObject.h"
  7. #import <appkit/appkit.h>
  8. #import <dpsclient/wraps.h>
  9.  
  10. @implementation SphereView
  11.  
  12. - initFrame:(const NXRect *)r
  13. {
  14.     [super initFrame:r];
  15.     return self;
  16. }
  17.  
  18. - drawSelf:(const NXRect *)r: (int)c;
  19. {
  20.     if ([sphereControlPtr readShadeFlag]) PSsetgray(0.333);
  21.     else PSsetgray(1.0);
  22.     NXRectFill(r);
  23.     PSsetgray(0.0);
  24.     NXFrameRect(r);
  25.     [sphereDrawerObjectPtr computeSphere];
  26.     return self;
  27. }
  28. @end
  29.